(finder-commentary): Call delete-other-windows.

diff --git a/lisp/finder.el b/lisp/finder.el
index 2958f36c3d9f67f0278751c7c97385e170cea418..0bd001752fe3271cf611ac81082edc0419323956 100644 (file)
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -282,6 +282,7 @@ FILE should be in a form suitable for passing to `locate-library'."
        (error "Can't find any Commentary section"))
     ;; This used to use *Finder* but that would clobber the
     ;; directory of categories.
+    (delete-other-windows)
     (pop-to-buffer "*Finder-package*")
     (setq buffer-read-only nil)
     (erase-buffer)